home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Commodore Disk User Volume 2 #2
/
Commodore_Disk_User_Vol.2_2_1989_-_Side_A.d64
/
data maker
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
6KB
|
163 lines
5 print "[147]":print:print " this is a basic loader":print
7 print " please wait 1 minute..."
10 rem *****************************
15 rem * m/c datamaker *
20 rem * s.j.massey feb 88' *
25 rem *****************************
30 sa=40960:el=138:ls=100:gosub45
35 sa=53232:el=1:ls=1500:gosub45
37 print
40 print " data maker is entered using the"
41 print "following commands:"
43 print:print "new":print:print "sys 53232":print:end
45 for nu=0toel:ch=0
50 for d=0to7:readva
55 if va<0 or va>255 then print"error in line";ls+(nu*10):stop
60 pokesa+(nu*8)+d,va:ch=ch+va:nextd
65 read tv:iftv<>ch then print"error in line";ls+(nu*10)
70 nextnu
75 return
90 rem ***** data for program ****
100 data 73,78,80,85,84,45,42,83,570
110 data 84,65,82,84,32,76,73,78,574
120 data 69,63,42,73,78,67,82,69,543
130 data 77,69,78,84,32,80,69,82,571
140 data 32,76,73,78,69,63,42,83,516
150 data 84,65,82,84,32,65,68,68,548
160 data 82,69,83,83,32,79,70,32,530
170 data 67,79,68,69,63,42,69,78,535
180 data 68,32,65,68,68,82,69,83,535
190 data 83,32,79,70,32,67,79,68,510
200 data 69,63,42,56,164,65,76,80,615
210 data 72,65,32,78,85,77,69,82,560
220 data 73,67,83,32,79,78,76,89,577
230 data 32,80,76,69,65,83,69,42,516
240 data 169,161,69,78,68,32,32,32,641
250 data 69,78,68,32,65,68,68,82,530
260 data 69,83,83,32,77,85,83,84,596
270 data 32,66,69,32,42,32,32,32,337
280 data 32,32,71,82,69,65,84,69,504
290 data 82,32,84,72,65,78,32,83,528
300 data 84,65,82,84,32,65,68,68,548
310 data 82,69,83,83,33,33,42,255,680
320 data 71,69,84,73,78,32,68,229,704
330 data 169,0,133,251,169,160,133,252,1267
340 data 32,109,162,162,2,32,39,162,700
350 data 32,109,162,169,184,133,253,169,1211
360 data 3,133,254,162,5,32,137,162,888
370 data 162,6,32,39,162,32,109,162,704
380 data 169,186,133,253,169,3,133,254,1300
390 data 162,3,32,137,162,162,14,32,704
400 data 39,162,32,109,162,169,188,133,994
410 data 253,169,3,133,254,162,5,32,1011
420 data 137,162,162,18,32,39,162,32,744
430 data 109,162,169,190,133,253,169,3,1188
440 data 133,254,162,5,32,137,162,32,917
450 data 38,164,56,165,45,233,2,133,836
460 data 251,165,46,233,0,133,252,173,1253
470 data 188,3,133,180,173,189,3,133,1002
480 data 181,169,0,141,182,3,160,2,838
490 data 173,184,3,145,251,173,185,3,1117
500 data 200,145,251,200,169,131,145,251,1492
510 data 200,169,32,145,251,169,0,141,1107
520 data 180,3,141,181,3,169,8,141,826
530 data 183,3,162,0,161,180,72,24,785
540 data 109,180,3,141,180,3,173,181,970
550 data 3,105,0,141,181,3,104,141,678
560 data 192,3,142,193,3,32,54,163,782
570 data 104,200,145,251,202,208,249,200,1559
580 data 169,44,145,251,230,180,208,2,1229
590 data 230,181,165,181,205,191,3,208,1364
600 data 5,165,180,205,190,3,208,8,964
610 data 169,1,141,182,3,76,169,161,902
620 data 174,183,3,202,142,183,3,208,1098
630 data 177,173,180,3,141,192,3,173,1042
640 data 181,3,141,193,3,32,54,163,770
650 data 104,200,145,251,202,208,249,138,1497
660 data 200,145,251,200,152,72,24,160,1204
670 data 0,101,251,145,251,133,45,200,1126
680 data 169,0,101,252,145,251,133,46,1097
690 data 104,168,165,45,133,251,165,46,1077
700 data 133,252,173,182,3,201,0,208,1152
710 data 22,24,173,184,3,109,186,3,704
720 data 141,184,3,173,185,3,109,187,985
730 data 3,141,185,3,76,54,161,169,792
740 data 0,160,0,145,251,200,145,251,1152
750 data 24,169,2,101,45,133,45,169,688
760 data 0,101,46,133,46,24,165,45,560
770 data 105,7,133,47,133,49,169,0,643
780 data 101,46,133,48,133,50,96,24,631
790 data 160,5,32,240,255,96,141,183,1112
800 data 3,173,192,3,72,173,193,3,812
810 data 72,169,0,141,180,3,141,181,887
820 data 3,160,8,78,183,3,144,19,598
830 data 173,180,3,24,109,192,3,141,825
840 data 180,3,173,181,3,109,193,3,845
850 data 141,181,3,14,192,3,46,193,773
860 data 3,136,208,223,104,141,193,3,1011
870 data 104,141,192,3,96,160,0,177,873
880 data 251,201,42,240,6,32,210,255,1237
890 data 200,208,244,24,200,152,101,251,1380
900 data 133,251,169,0,101,252,133,252,1291
910 data 96,142,194,3,104,141,196,3,879
920 data 104,141,197,3,142,195,3,169,954
930 data 191,72,32,228,255,240,251,32,1301
940 data 210,255,201,13,240,6,72,206,1203
950 data 195,3,208,238,169,1,141,192,1147
960 data 3,169,0,141,193,3,168,145,822
970 data 253,200,145,253,104,201,191,240,1587
980 data 108,201,58,176,47,201,47,144,982
990 data 43,41,15,32,46,162,160,0,499
1000 data 24,173,180,3,113,253,145,253,1144
1010 data 200,173,181,3,113,253,145,253,1321
1020 data 169,10,32,46,162,173,180,3,775
1030 data 141,192,3,173,181,3,141,193,1027
1040 data 3,76,188,162,104,201,191,208,1133
1050 data 251,165,251,141,192,3,165,252,1420
1060 data 141,193,3,169,85,133,251,169,1144
1070 data 160,133,252,169,13,32,210,255,1224
1080 data 32,109,162,173,192,3,133,251,1055
1090 data 173,193,3,133,252,169,13,32,968
1100 data 210,255,169,63,32,210,255,174,1368
1110 data 194,3,76,148,162,173,197,3,956
1120 data 72,173,196,3,72,96,216,104,932
1130 data 141,198,3,104,141,199,3,140,929
1140 data 200,3,162,1,169,172,72,173,952
1150 data 193,3,201,7,144,31,208,7,794
1160 data 173,192,3,201,208,144,22,56,999
1170 data 173,192,3,233,208,141,192,3,1145
1180 data 173,193,3,233,7,141,193,3,946
1190 data 169,50,72,162,0,173,193,3,822
1200 data 201,3,144,31,208,7,173,192,959
1210 data 3,201,232,144,22,56,173,192,1023
1220 data 3,233,232,141,192,3,173,193,1170
1230 data 3,233,3,141,193,3,169,49,794
1240 data 72,162,0,173,193,3,201,0,804
1250 data 208,7,173,192,3,201,100,144,1028
1260 data 42,160,1,56,173,192,3,233,860
1270 data 100,141,192,3,173,193,3,233,1038
1280 data 0,141,193,3,201,0,208,7,753
1290 data 173,192,3,201,100,144,3,200,1016
1300 data 208,225,152,9,48,72,162,0,876
1310 data 76,210,163,224,0,208,3,169,1053
1320 data 48,72,173,192,3,201,10,144,843
1330 data 18,160,1,56,173,192,3,233,836
1340 data 10,141,192,3,201,10,144,13,714
1350 data 200,208,240,224,0,208,10,169,1259
1360 data 48,72,76,249,163,152,9,48,817
1370 data 72,173,192,3,9,48,72,160,729
1380 data 0,104,200,153,192,3,201,172,1025
1390 data 208,247,136,152,170,160,0,200,1273
1400 data 185,192,3,201,172,240,3,72,1068
1410 data 208,245,172,200,3,173,199,3,1203
1420 data 72,173,198,3,72,96,173,189,976
1430 data 3,205,191,3,144,10,208,9,773
1440 data 173,188,3,205,190,3,176,1,939
1450 data 96,169,117,133,251,169,160,133,1228
1460 data 252,169,13,32,210,255,32,109,1072
1470 data 162,169,13,32,210,255,32,109,982
1480 data 162,104,104,96,0,0,0,0,466
1490 rem ***** data for driver ******
1500 data 165,1,72,169,54,133,1,32,627
1510 data 181,160,104,133,1,96,0,0,675